home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 6 / The Arsenal Files 6 (Arsenal Computer).ISO / os2 / fff13e.zip / CLEARINI.CMD < prev    next >
OS/2 REXX Batch file  |  1996-01-05  |  3KB  |  100 lines

  1. /* Remove.CMD    REXX script to remove all FFF-entries from INI-Files    */
  2. /*               Frisky File Finder V1.3                                 */
  3.   
  4. /* uses SysIni to change User-INI */
  5. CALL RxFuncAdd 'SysIni', 'rexxutil', 'SysIni'
  6. CALL RxFuncAdd 'SysCls', 'rexxutil', 'SysCls'
  7.  
  8. application = 'FFF'
  9. value       = ''
  10.  
  11. call SysCls
  12. say '--------------------------------------------------------------------------------'
  13. say '            FFF - Frisky File Finder V. 1.3 -- remove INI-entries'
  14. say
  15. say '   This Procedure will help you to remove any INI-entry for '
  16. say '   the Frisky File Finder V. 1.3'
  17. say '--------------------------------------------------------------------------------'
  18. say
  19. say 'Remove registration information from INI-File? (y|n) : ';
  20. call charout , '--> ';
  21. pull answer;
  22. if answer='Y' then do
  23.    keyname     = 'Alias'
  24.    call SysIni 'USER', application, keyname, value
  25.    call charout , '   .';
  26.    keyname     = 'Code'
  27.    call SysIni 'USER', application, keyname, value
  28.    call charout , '.';
  29.    keyname     = 'Validation'
  30.    call SysIni 'USER', application, keyname, value
  31.    call charout , '.';
  32.    say
  33.    say '   Registration information removed.'
  34. end
  35. else
  36.    say '   Keeping registration information.'
  37.  
  38. say
  39. say
  40. say 'Remove FFF settings from INI-File? (y|n) : '
  41. call charout , '--> ';
  42. pull answer;
  43. if answer='Y' then do
  44.    keyname     = 'DLGMain';
  45.    call SysIni 'USER', application, keyname, value
  46.    call charout , '   .';
  47.    keyname     = 'WNDSearch'
  48.    call SysIni 'USER', application, keyname, value
  49.    call charout , '.';
  50.    keyname     = 'WNDResults'
  51.    call SysIni 'USER', application, keyname, value
  52.    call charout , '.';
  53.    keyname     = 'WNDSettings'
  54.    call SysIni 'USER', application, keyname, value
  55.    call charout , '.';
  56.    keyname     = 'AllDrvsOnInit'
  57.    call SysIni 'USER', application, keyname, value
  58.    call charout , '.';
  59.    keyname     = 'SkipNetDrvs'
  60.    call SysIni 'USER', application, keyname, value
  61.    call charout , '.';
  62.    keyname     = 'SkipCDDrvs'
  63.    call SysIni 'USER', application, keyname, value
  64.    call charout , '.';
  65.    keyname     = 'Editor'
  66.    call SysIni 'USER', application, keyname, value
  67.    call charout , '.';
  68.    keyname     = 'EditorMultiFile'
  69.    call SysIni 'USER', application, keyname, value
  70.    call charout , '.';
  71.    keyname     = 'EditorPrefix'
  72.    call SysIni 'USER', application, keyname, value
  73.    call charout , '.';
  74.    keyname     = 'EditorPrefixPerFile'
  75.    call SysIni 'USER', application, keyname, value
  76.    call charout , '.';
  77.    keyname     = 'EditorSuffix'
  78.    call SysIni 'USER', application, keyname, value
  79.    call charout , '.';
  80.    keyname     = 'EditorSuffixPerFile'
  81.    call SysIni 'USER', application, keyname, value
  82.    call charout , '.';
  83.    keyname     = 'ThreadPriority'
  84.    call SysIni 'USER', application, keyname, value
  85.    call charout , '.';
  86.    keyname     = 'DateStyle'
  87.    call SysIni 'USER', application, keyname, value
  88.    call charout , '.';
  89.    say
  90.    say '   Removed FFF settings from INI-File.'
  91. end
  92. else
  93.    say '   Keeping settings.'
  94. say
  95. say
  96. say 'Press <Enter> to exit.'
  97. pull
  98. call SysCls
  99.  
  100.